object frHISTORY_PRIB: TfrHISTORY_PRIB
  Left = 0
  Top = 0
  BorderStyle = bsSingle
  Caption = #1048#1089#1090#1086#1088#1080#1103' '#1086#1090#1082#1083#1102#1095#1077#1085#1080#1103' '#1087#1088#1080#1073#1086#1088#1086#1074
  ClientHeight = 269
  ClientWidth = 899
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Tahoma'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object pTable: TPanel
    Left = 0
    Top = 0
    Width = 899
    Height = 244
    Align = alClient
    TabOrder = 0
    object sgHISTORY_PRIB: TDBGrid
      AlignWithMargins = True
      Left = 4
      Top = 4
      Width = 891
      Height = 236
      Align = alClient
      DataSource = dsHISTORY_PRIB
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'NOM_ABON'
          Title.Caption = #1051#1080#1094#1077#1074#1086#1081
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NAI_VIDPR'
          Title.Caption = #1042#1080#1076' '#1087#1088#1080#1073#1086#1088#1072
          Width = 133
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DAT_OTKL'
          Title.Caption = #1044#1072#1090#1072' '#1086#1090#1082#1083#1102#1095#1077#1085#1080#1103
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DAT_VKL'
          Title.Caption = #1044#1072#1090#1072' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
          Width = 136
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'KON_POK'
          Title.Caption = #1055#1086#1082'. '#1089#1095#1077#1090#1095#1080#1082#1072
          Width = 136
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'N_PR_OTKL'
          Title.Caption = #1055#1088#1080#1095#1080#1085#1072' '#1086#1090#1082#1083#1102#1095#1077#1085#1080#1103
          Width = 206
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'N_SP_OTKL'
          Title.Caption = #1057#1087#1086#1089#1086#1073' '#1086#1090#1082#1083#1102#1095#1077#1085#1080#1103
          Width = 105
          Visible = True
        end>
    end
  end
  object pUPR: TPanel
    Left = 0
    Top = 244
    Width = 899
    Height = 25
    Align = alBottom
    TabOrder = 1
  end
  object ActionList1: TActionList
    Left = 732
    Top = 46
    object ESC: TAction
      Caption = 'ESC'
      ShortCut = 27
      OnExecute = ESCExecute
    end
  end
  object dsetHISTORY_PRIB: TIBCQuery
    SQL.Strings = (
      'select b.*,'
      'sv.nai_vidpr,'
      
        '(select k.naim_kod as N_PR_OTKL  from klsfct k where k.kod=10 an' +
        'd k.kod_hc=b.pr_otkl),'
      
        '(select k.naim_kod as N_SP_OTKL  from klsfct k where k.kod=27 an' +
        'd k.kod_hc=b.sp_otkl)'
      'from b_otkl b, sp_vidprib sv'
      'where b.nom_abon=:NOM'
      'and b.vid_prib=sv.kod_vidpr')
    Left = 600
    Top = 25
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'NOM'
      end>
  end
  object dsHISTORY_PRIB: TIBCDataSource
    DataSet = dsetHISTORY_PRIB
    Left = 633
    Top = 25
  end
end
